home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Garden Fax: Trees, Shrubs, Roses & Conifers
/
Garden Fax - Trees, Shrubs, Roses & Conifers (1991)(CDTV Publishing)[!].iso
/
s
/
startup-sequence.bak
< prev
next >
Wrap
Text File
|
1978-01-06
|
1KB
|
56 lines
;
; Startup sequence for CDTVGQA
;
; Variants :-
; GQA: set to drive (CD0: or DF0:) where s/w is
; APPLIC: path for image data, i.e. subject matter
; FILMS: path for film scripts (DF0: or APPLIC:IMAGES)
;
CD0:SYSTEM/C/ASSIGN sys: CD0:SYSTEM
CD0:SYSTEM/C/ASSIGN c: SYS:c
assign GQA: df0:
assign APPLIC: CD0:INDOOR
;
binddrivers
assign L: SYS:l
assign FONTS: CD0:FONTS
assign S: GQA:s
assign DEVS: SYS:devs
assign LIBS: SYS:libs
makedir ram:tr
assign t: ram:tr
assign IMAGES: APPLIC:IMAGES
; ASSIGN FILMS: APPLIC:IMAGES ; ONE OR OTHER OF
ASSIGN FILMS: DF0: ; THESE
ASSIGN COMIMAGES: APPLIC:IMAGES/COM
ASSIGN INDIMAGES: APPLIC:IMAGES/IND
ASSIGN PIMAGES: APPLIC:IMAGES/P
ASSIGN SIMAGES: APPLIC:IMAGES/S
ASSIGN PICONS: APPLIC:IMAGES/PICONS
ASSIGN DBDATA: CD0:DATA
; !
; ! make sure you remove this next line for the CD title --
; !
Addbuffers df0: 10
; !
; ! -- it won't have a floppy drive
; !
cd c:
Sys:System/FastMemFirst ; move C00000 memory to last in list
BindDrivers
FF >NIL: -0 ;speed up Text
resident CLI L:Shell-Seg SYSTEM pure add; activate Shell
resident c:Execute pure
mount newcon:
;
failat 11
run execute s:StartupII ;This lets resident be used for rest of script
wait >NIL: 5 mins ;wait for StartupII to complete (will signal when done)
;
SYS:System/SetMap gb ;Activate the ()/* on keypad
path ram: c: sys:system s: add
ASSIGN FONTS: CD0:FONTS
GQA:ovlcdtvgqa GQA:ind.setup
; NEWCLI
;